home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 17 / CU Amiga Magazine's Super CD-ROM 17 (1997)(EMAP Images)(GB)[!][issue 1997-12].iso / CUCD / Programming / DiceSource / lib / amiga / divs.a < prev    next >
Text File  |  1994-02-01  |  433b  |  35 lines
  1.  
  2.         ;   DIVS.A
  3.         ;
  4.         ;   (c)Copyright 1990, Matthew Dillon, All Rights Reserved
  5.         ;
  6.         ;   D0/D1 -> D0 signed divide
  7.         ;   32/32 -> 32 signed divide
  8.  
  9.         section text,code
  10.  
  11.         xdef    __divs
  12.         xref    __divu
  13.  
  14. __divs:
  15.         tst.l    D1
  16.         bmi    ds10
  17.         tst.l    D0         ; numerator
  18.         bmi    ds20
  19.         bra    __divu
  20. ds10        neg.l    D1
  21.         tst.l    D0
  22.         bmi    ds30
  23. ds10n        bsr    __divu
  24.         neg.l    D0
  25.         rts
  26. ds20        neg.l    D0
  27.         bsr    __divu
  28.         neg.l    D0
  29.         rts
  30. ds30        neg.l    D0
  31.         bra    __divu
  32.  
  33.         END
  34.  
  35.